home *** CD-ROM | disk | FTP | other *** search
- @ECHO OFF
- REM UX=-S
- REM UnREM above if a high speed modem with no 16550AFN/Intelligent UART.
- CALL SETS.BAT
- SET TXHOW=
- SET COM%P%=%LR%
- CLS
- ECHO ˇ
- ECHO Zmodem Upload - Download Processor
- ECHO FAST Streaming Protocol - DSZ/GSZ Compatible
- ECHO Full Stream and Keep Aborts Enabled
- ECHO ˇ
- ECHO Download : ENTER Key or D
- ECHO ˇ
- ECHO Upload : FIlespec(s) (wildcards * and ? are OK !)
- ECHO ˇ
- ECHO F = %FL% ; H = %HL% ; A = ABORT
- ECHO ˇ
- ECHO Multiples OK C:\UPLOAD\*.* C:\FILES\FILE*.?OC C:\DOCS\MYDOC?.??C
- ECHO ˇ
- CIASK Choice : TXHOW
- IF .%TXHOW%==. GOTO DOWNSTART
- FOR %%F IN (a A) DO IF '%TXHOW%'=='%%F' GOTO END
- FOR %%F IN (d D) DO IF '%TXHOW%'=='%%F' GOTO DOWNSTART
- FOR %%F IN (f F) DO IF '%TXHOW%'=='%%F' SET TXHOW=-@%CIL%\%FL%
- FOR %%F IN (h H) DO IF '%TXHOW%'=='%%F' SET TXHOW=-@%CIL%\%HL%
- FOR %%F IN (-@%CIL%\%FL% -@%CIL%\%HL%) DO IF '%TXHOW%'=='%%F' GOTO USELIST
- SET FTX=-F
- :USELIST
- CLS
- ZMODEM %UX% -B%TR% P-%P% -L%LR% %FTX% %TXHOW%
- GOTO END
- :DOWNSTART
- CLS
- ZMODEM -K %UX% -B%TR% -P%P% -L%LR% -U%DL% -R
- :END
- SET TXHOW=
- SET FTX=
- SET UX=
- EXIT